 Loading |
|
Loading |
| VBScript |
| JavaScript |
| Powershell |
Search Options: Create a New Outlook Distribution List Based On the Membership of an Active Directory Group
|
||
|
On Error Resume Next
Const olDistributionListItem = 7 Set objOutlook = CreateObject("Outlook.Application") Set objList = objOutlook.CreateItem(olDistributionListItem ) objList.DLName = "Test Group" objList.Save Set objGroup = GetObject("LDAP://CN=Finance Users,OU=Finance,,DC=fabrikam,DC=com") For Each strUser in objGroup.Member Set objUser = GetObject("LDAP://" & strUser) strUserName = objUser.displayName Set objRecipient = objOutlook.Session.CreateRecipient(strUserName) objRecipient.Resolve objList.AddMember objRecipient Next | ||
© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at :: | ||
